home *** CD-ROM | disk | FTP | other *** search
/ Workbench Add-On / Workbench Add-On - Volume 1.iso / DiskUtil / Misc / DiskSpare / install.d < prev    next >
Text File  |  1995-11-24  |  2KB  |  89 lines
  1. (if (= @language "deutsch")
  2.     (
  3.         (SET Intro      "Wilkommen zum Installer-Script für die DiskSpare.Device")
  4.         (SET DDHD       "Fuer welche Art von Diskettenlaufwerken wollen sie die Treiber anlegen ?")
  5.         (SET ChooseDrives "Bitte wählen sie die Laufwerke, für die sie Treiber anlegen möchten")
  6.     )
  7. )
  8.  
  9.  
  10.  
  11. (COPYLIB
  12.     (SOURCE ":DiskUtil/Misc/DiskSpare/diskspare.device")
  13.     (DEST   "devs:")
  14. )
  15.  
  16. (SET WauWau
  17.     (ASKCHOICE
  18.         (PROMPT DDHD)
  19.         (HELP   "")
  20.         (CHOICES
  21.             "HD-Drive"
  22.             "DD-Drive"
  23.         )
  24.     )
  25. )
  26.  
  27. (SELECT WauWau
  28.     (
  29.         (SET Wuerg "HD")
  30.     )
  31.     (
  32.         (SET Wuerg "DD")
  33.     )
  34. )
  35.  
  36.  
  37. (if (EXISTS "devs:dosdrivers")
  38.     (
  39.  
  40.         (SET #Drives
  41.             (ASKOPTIONS
  42.                 (PROMPT  ChooseDrives)
  43.                 (HELP   "")
  44.                 (CHOICES
  45.                     "DS0:"
  46.                     "DS1:"
  47.                     "DS2:"
  48.                     "DS3:"
  49.                 )
  50.                 (DEFAULT    1)
  51.             )
  52.         )
  53.  
  54.         (if (BITAND #DRIVES 1)
  55.             (COPYFILES
  56.                 (SOURCE (cat ":DiskUtil/Misc/DiskSpare/"Wuerg"/DS0"))
  57.                 (DEST   "devs:dosdrivers")
  58.             )
  59.         )
  60.         (if (BITAND #DRIVES 2)
  61.             (COPYFILES
  62.                 (SOURCE (cat ":DiskUtil/Misc/DiskSpare/"Wuerg"/DS1"))
  63.                 (DEST   "devs:dosdrivers")
  64.             )
  65.        )
  66.         (if (BITAND #DRIVES 4)
  67.             (COPYFILES
  68.                 (SOURCE (cat ":DiskUtil/misc/DiskSpare/"Wuerg"/DS2"))
  69.                 (DEST   "devs:dosdrivers")
  70.             )
  71.         )
  72.         (if (BITAND #DRIVES 8)
  73.             (COPYFILES
  74.                 (SOURCE (cat ":DiskUtil/misc/DiskSpare/"Wuerg"/DS3"))
  75.                 (DEST   "devs:dosdrivers")
  76.             )
  77.         )
  78.     )
  79.     (
  80.         (COPYFILES
  81.             (PROMPT (CAT :DiskUtil/misc/DiskSpare/#?)) 
  82.             (DEST   "ram:")
  83.         )
  84.     )
  85. )
  86.  
  87.  
  88.  
  89.